﻿Public Class TMyColumnPrivileges
    Friend _TableName As String
    Friend _ColumnName As String
    Friend _Timestamp As DateTime
    Friend _ColumnPriv As String
    Friend _Db As String
    Friend _Engine As String
    Friend _TableComment As String
    Friend _CreateTime As DateTime
    Friend _UpdateTime As DateTime

    Friend _ColumnType As String
    Friend _ColumnComment As String
    Public ReadOnly Property SelectPriv() As Boolean
        Get
            Return _ColumnPriv.Contains("Select")
        End Get
    End Property
    Public ReadOnly Property InsertPriv() As Boolean
        Get
            Return _ColumnPriv.Contains("Insert")
        End Get
    End Property
    Public ReadOnly Property UpdatePriv() As Boolean
        Get
            Return _ColumnPriv.Contains("Update")
        End Get
    End Property
    Public ReadOnly Property ReferencesPriv() As Boolean
        Get
            Return _ColumnPriv.Contains("References")
        End Get
    End Property

    Public ReadOnly Property Db() As String
        Get
            Return _Db
        End Get
    End Property
    Public ReadOnly Property TableName() As String
        Get
            Return _TableName
        End Get
    End Property

    Public ReadOnly Property ColumnName() As String
        Get
            Return _ColumnName
        End Get
    End Property

    Public ReadOnly Property Timestamp() As DateTime
        Get
            Return _Timestamp
        End Get
    End Property

    Public ReadOnly Property ColumnPriv() As String
        Get
            Return _ColumnPriv
        End Get
    End Property

    Public ReadOnly Property Engine() As String
        Get
            Return _Engine
        End Get
    End Property
    Public ReadOnly Property TableComment() As String
        Get
            Return _TableComment
        End Get
    End Property
    Public ReadOnly Property CreateTime() As DateTime
        Get
            Return _CreateTime
        End Get
    End Property
    Public ReadOnly Property UpdateTime() As DateTime
        Get
            Return _UpdateTime
        End Get
    End Property
    Public ReadOnly Property ColumnType() As String
        Get
            Return _ColumnType
        End Get
    End Property
    Public ReadOnly Property ColumnComment() As String
        Get
            Return _ColumnComment
        End Get
    End Property

End Class
